home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Turnbull China Bikeride
/
Turnbull China Bikeride - Disc 2.iso
/
STUTTGART
/
UTIL
/
MEMORY
/
OLD
/
MEM208SRC
/
!Memphis
/
s
/
templates
< prev
Wrap
Text File
|
1993-07-06
|
2KB
|
76 lines
; > s.templates
;
; Description ObjAsm source code for template code/data for MemFSFiler
; Author Nick Smith
; Version 0.02
; Date 6th July 1993
; Copyright (c) Nick Smith, 1993
; *** Assembler directives
GET hdr.regs ; GET register definitions
GET hdr.swis
GET s.Macros
; Area name C$$code advisable as wanted to link with C output
AREA |C$$code|, CODE, READONLY
IMPORT |x$stack_overflow|
EXPORT |service_resourcefsstarting|
EXPORT |templates_data|
EXPORT |resource_registerfiles|
EXPORT |resource_deregisterfiles|
; The following bytes contain the name of the following procedure to
; make stack backtracing work, eg. when an address exception occurs!
= "service_resourcefsstarting", 0 ; Align
ALIGN
DCD &ff00001C
|service_resourcefsstarting|
STMFD sp!, {r0,lr}
ADR r0, templates_data
MOV lr, pc
MOV pc, r2
LDMFD sp!, {r0, pc}^
= "resource_registerfiles", 0 ; Align
ALIGN
DCD &ff000018
|resource_registerfiles|
MOV ip, sp
STMFD sp!, {a1,fp,ip,lr,pc}
SUB fp, ip, #4
CMPS sp, sl
BLLT |x$stack_overflow|
ADR r0, templates_data
SWI XResourceFS_RegisterFiles
LDMEA fp, {fp,sp,pc}^
= "resource_deregisterfiles", 0 ; Align
ALIGN
DCD &ff00001C
|resource_deregisterfiles|
MOV ip, sp
STMFD sp!, {a1,fp,ip,lr,pc}
SUB fp, ip, #4
CMPS sp, sl
BLLT |x$stack_overflow|
ADR r0, templates_data
SWI XResourceFS_DeregisterFiles
LDMEA fp, {fp,sp,pc}^
; ResourceFS data block for Templates file
; AREA |C$$data|, DATA
|templates_data|
ResourceFile "Resources.Templates", "Resources.Memphis.Templates"
ResourceFile "Resources.Template3D", "Resources.Memphis.Template3D"
DCD 0 ; Terminator
END